perm filename SYMMAK.MAC[S,DWP] blob sn#144587 filedate 1975-02-12 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	TITLE SYMMAK CONSTRUCTS LISP SYSBOL TABLE IN FILE LISP.SYM
C00003 ENDMK
CāŠ—;
TITLE SYMMAK CONSTRUCTS LISP SYSBOL TABLE IN FILE LISP.SYM

MLON
A=1
B=2
P=14

EXTERNAL JOBSYM
SYMMAK:	SOS 2,JOBSYM
   	MOVEM 2,LST
	INIT 17
	SIXBIT /DSK/
	0
	HALT
	ENTER FILE
	HALT
	OUTPUT [IOWD 1,LST	;OUTPUT LENGTH OF FILE
		0]
	OUTPUT LST
	STATZ 740000
	HALT
	RELEASE
	CALL [SIXBIT /EXIT/]

FILE:	SIXBIT /IL/
	SIXBIT /SYZ/
	0
	0

LST:	0
	0

END SYMMAK